home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d11 / basmus.arc / MTN-KING.BAS (.txt) < prev    next >
Encoding:
GW-BASIC  |  1990-09-29  |  640 b   |  22 lines
  1. 10  'CLS:KEY OFF
  2. 20  PLAY"L8 T150 MS"
  3. 25  FOR J=1 TO 1
  4. 30  FOR I=1 TO 10
  5. 40   READ M$
  6. 50  'PRINT M$
  7. 60   PLAY M$
  8. 65  'INPUT X$
  9. 70  NEXT I
  10. 75  RESTORE 100
  11. 80  NEXT
  12. 100  DATA "O3D E F G A F A4 G+ E G+4 G E- G4"
  13. 110  DATA "D E F G A F A O4D C O3A F A O4C2"
  14. 120  DATA "O3D E F G A F A4 G+ E G+4 G E- G4"
  15. 130  DATA "D E F G A F A O4D O3A F A O4D O3D2"
  16. 140  DATA "A B O4C+ D E C+ E4 F C+ F4 E C+ E4 O3A B O4C+ D E C E4 F C+ F4 E2"
  17. 150  DATA "O3A B O4C+ D E C+ E4 F C+ F4 E C+ E4 O3A B O4C+ D E C E4 F C+ F4 E2"
  18. 160  DATA "O3D E F G A F A4 G+ E G+4 G E- G4"
  19. 170  DATA "D E F G A F A O4D C O3A F A O4C2"
  20. 180  DATA "O3D E F G A F A4 G+ E G+4 G E- G4"
  21. 190  DATA "D E F G A F A O4D O3A F A O4D O3D2"
  22.